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1 . 


ABSTRACT 


The ISZ Test checks the operation of the ISZ instruction of the PDP-15. 
Various checks of the ISZ instruction are made, including ISZ of 
777777g to Og on all memory locations, and ISZ of random numbers 
stored in random memory locations from random memory locations. 

Errors are indicated to the operator via the teleprinter. 

2. REQUIREMENTS 

2. 1 Equipment 

Standard PDP-15 computer 

2.2 Storage 

The program uses all of 4K memory for the program or as a test area. 

When the program resides in upper 2K of memory, it occupies from 
locations 06440 to 07711 . The random ISZ portion of the test tests 
all locations below 06440. 

2.3 Preliminary Programs 
Basic instruction tests 

3. LOADING PROCEDURE 

3 . 1 Method 

a. Put HRI tape of program in reader (high speed, if available). 

b. Set ADDRESS SWITCHES TO 00200; the BANK MODE switch on a 1 . 

c. Depress and release READ-IN key. 

4. STARTING PROCEDURE 

4. 1 Control Switch Settings 


The following is a table of ACCUMULATOR SWITCH settings and 
their action on the program; 
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Action 


4.2 


4.3 


AC Switch Set As 


0 

1 

2 

3 

4 

5 


6 

7 

8 


1 Holt on error 

0 Don't halt on error 

1 Don't print on errors 

0 Print errors 

1 Ring bell on error 

0 Ring bell after N passes 

1 Loop on current conditions 

0 Don't loop on current conditions 

1 Loop on current test 

0 Don't loop on current test 

1 Save initial error conditions of 
random ISZ 

0 Don't save initial error conditions 
of random ISZ 

1 Vary location of ISZ instruction 

0 Don't vary location of ISZ instruction 

1 Vary location of number incremented 

0 Don't vary location of number incremented 

1 Vary number Incremented 

0 Don't vary number incremented 


(Switches 6 , 7, 8 operate in conjunction with 5; 3 supercedes 4) 


N is an arbitrary number (Initially 20000- for random (iSZ's) which is 
controlled by the LAW-N instruction in location 07052 and may be 
changed at the operator's discretion. 


Starting Addresses 

The starting address of the program is 00200. The restart addresses 
are 00200, 00244, 07000, 7052, and 7652 (see Section 5.3). 

Program and/or Operator Action 


a. Set ADDRESS SWITCHES to 00200 

b. Set ACCUMULATOR SWITCHES to desired positions (see 
Section 4.1). Normal setting is 510000. 

c. Depress I/O RESET 

d. Depress START 
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5. 


OPERATING PROCEDURE 


5. 1 Operationol Switch Settings 

See Section 4.1. 

5.2 Subroutine Abstracts 

None 

5.3 Program and/or Operator Action 

a. To put the program in the 'scope mode, the ACCUMULATOR 
SWITCHES should be set to 270000, (don't halt, don't print, 
bell after N passes, loop on current number (location), loop 
on current test, save error conditions) . 

b. To start program initially so that upper memory may be checked, 
start at location 00200. 

c. To start program initially so that lower memory may be checked 
without checking upper memory, start at location 00244. 

d. To restart program to check upper memory after program has 
moved, restart at 07652. 

e. To restart program to check lower memory after program has 
moved, restart at 07000. 

f. To restart program to check random ISZ's after program has 
moved, restart at 07052. 

6. E RRORS 

^Jhless AC switch 1 is a 1, all errors will be printed on the Teletype. 

6 . 1 Error Halts and Description 


6.2 


Location 

Description 

00442 

ISZ on upper memory did not skip 

00504 

Location in upper memory did not 

07466 

ISZ on lower memory did not skip 

07530 

Location in lower memory did not 

07601 

Random ISZ add failure 


Error Recovery 
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6 . 2.1 


To Repeat Failure 


If AC switch 0 is a 1, the computer will halt on an error. To recover 
and repeat the failure, reset AC switches 0 to 5 as necessary (see 
Section 4.1) and then depress CONTINUE key. 

6.2.2 Recovery with Random ISZ 

The random ISZ portion of this test has special recovery features. 

AC switch 3, as with the other tests, may be used to put the program 
in the 'scope mode (loop on current conditions). If, however, it is 
desired to save the conditions of an error and vary the parameters which 
make up the current conditions, AC switches 5 to 8 may be used. If 
switch 5 is a 1, and an error occurs, the exact conditions which caused 
the error will be saved (location of ISZ instruction, location of 
number ISZ'd, number ISZ'd). By setting switches 6, 7, and/or 8 
to a 1, any one or all of these conditions may be changed. Returning 
6, 7, and/or 8 to 0 causes the original error condition for that 
switch to be used again. Thus it is possible to determine which 
condition(s) is causing the error. Switches 5-8 have no effect, if 
an error does not occur. 

6.2.3 Test Special Conditions with Random ISZ 

To test special conditions in the random ISZ. test, store the location 
of the ISZ instruction in 07112 (SAVEl) and 07115 (RANDl), store 
the location of the number ISZ'd in 07113 (SAVE2) and 07116 (RAND2) 
and store the number to be ISZ'd in 07114 (SAVES) and 07117 (RAND3). 
Restart the program at location 07067 (PROCED) with AC switches 3 
and 5 to 1 . 

6.2.4 Test Particular Memory Location 

To test a particular memory location in the ISZ to 0 tests, store the 
number of the location to be tested in 00252 (PNTR2) if program is in 
low memory and an upper memory location is to be tested (if program 
is not in low memory, move it there by restarting computer at 07652 
(MOVEDN), or in 07046 (PNTRl) if program is in high memory and a 
lower memory location is to be tested (if program is not in high memory, 
move it there by restarting computer at 00244 (MOVEUP). Whether the 
program is in lov/er or upper memory can be determined bv the program 
counter while the program is running (it may be easier to stop the computer 
before looking at the PC). If the PC contains a number above 04000, the 
program is in upper 2K of memory and conversely. Restart computer at 
00206 (lSZHl+6) or 07005 (ISZLOW+5) (as appropriate) with AC 
switches 3 and 4 a 1 . 
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6.3 


Error Switch Hierarchy 



6.4 Error Typeout Exoinples 

6.4.1 Increment Memory from -1 to 0 

6.4. 1 . 1 No Skip 


ISZ DID NOT SKIP, LOC 001234 

The above example shows that the number in location 1234 (-1) 
when incremented, did not skip. 

6. 4. 1.2 Bad Add 

ISZ ADD 

NUMBER AT ORIGINAL BAD 

001234 777777 777777 

The above example shows that the number in location 1234 (-1) 
was not incremented. 
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6.4.2 


Random ISZ Test 


ISZ ADD 

NUMBER AT ORIGINAL BAD l‘;Z AT 

001234 765435 765434 005763 

The above example shows that a number in location 1234 (the number 
was 765435) was ISZ'd improperly producing a result of 765434 (carry 
from bit 17 to bit 16 was lost). The ISZ instruction was in location 
5763. 

7. MISCELLANEOUS 

7.1 Execution Time 
Not applicable 

8. PROGRAM DESCRIPTION 

There are three basic portions to the program, a portion which tests 
upper memory to be sure that all memory locations can be incremented 
to 0 (ISZHI), a portion which tests lower memory to be sure that all 
memory locations can be incremented to 0 (ISZLOW), and a portion 
which assures that random numbers stored in random memory locations 
can be ISZ'd from random memory location properly (RANISZ). 

8.1 ISZHI 


a. The first function performed is that of initializing the bell 
counter and setting up for header printing should an error occur. 

b. Then a pointer is set to 04000 to allow the program to access the 
first location to be tested. 

c. The number 777777* is stored in the memory location indicated 
in the pointer and it is then incremented to 0. Checks are made 
to assure that the computer skipped and the number went to 0. 

d. A check is then made to see if the memory location should be 
tested again (switch 3). If so, c Is repeated immediately. If 
not, then the address is incremented and then c is repeated. 

e. Step d is repeated until location 07777 ^ has been tested, at which 
time a check is made to determine if the sequence should be 
repeated (switch 4). If so, the program goes back to b. If not, 
the program is moved to upper memory and then control is trans- 
ferred to the ISZLOW portion of the program. 



8.2 


ISZLOW 


This portion is essentially the same as ISZHI except thot location 
0_ 2777 are tested and the program is not moved when ISZLOW 

4 O I . ^ 


8.3 RANISZ 


o. Fhst the Initialization of the loop counter and the header 
is set up. 

b. Then three random numbers are generated for the location 

of the ISZ^ location of the number, and the number respectively. 

c. The number is stored in the appropriate memory location and 
an ISZ instruction is formed for that location and stored in its 
proper place. 

d. The ISZ instruction is then executed and the result is checked 
with a synthesized ISZ for proper addition, if no errors 
occurred, a check is made to see if the test should be repeated 
(switch 3). If not then the program returns to step b. If it 
should be repeated, the program returns to step c. 

e. If an error occurred, the conditions which caused it are in- 
dicated to the operator (unless they have been suppressed by 
AC switch 1) and then a check is made to see if the conditions 
should be saved (switch 5). If not, the program proceeds on 
as if no error occurred. 

f ,. rr me error conditions should be saved, the pfogrom then determines 

’.vhich of the three variables should be changed, and repeats the 
test for the new variables and/or the old ones. The operator can 
always return to osiginol error conditions by setting AC switch 6 

7, and 8 to 0. By setting AC switch 5 to 0, the operator con continue 
on with testing independent of the error, if he so desires. 
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! S ? « 1 5 


.title IS2-1‘5 

/IS2 TEST 

.FULL 

0 0 ? 0 G . L 0 C 2 0 

/ROUTINE TO IS? JPPrR PK MEMORY FROM -1 TO 0 (OCCUPY LOW MEMORY) 


/ 


00?0/ 

760000 

I S?H j 

law 

00201 

040251 


qAC CnTR2 

0020? 

200507 


LAC C0NST3 

0020:^ 

040455 


DAC ERROR 4 +II 

0020'! 

200256 


LAC STRT 

0090'--; 

040252 


DAC PNtr2 

00206 

754001 


CLA iCLL ;CMa 

00207 

V160252 


DAC* PNTR2 

00210 

460252 


IS2* PNTR2 

00211 

1004^1 


jms error? 

00212 

220252 


LAC* PNTR2 

00213 

740200 


SZA 

00214 

100444 


JMS ERRORS 

0021^ 

750004 


LAS 

00216 

500254 


AND MASK12 

00217 

740200 


SZA 

00220 

600206 


JMP ISZHI+6 

00221 

750004 


LAS 

00222 

742010 


RTL 

00223 

741100 


SPA 

00224 

600232 


JMP .+6 

00225 

200251 


LAC CNTR2 

00226 

340253 


TAD 0NE2 

00227 

040251 


DAC CnTR2 

00230 

741200 


SNA 

00231 

100316 


JMS BELL2 

0023? 

200252 


lAC PnTR2 

00233 

540257 


SAO uPLIM2 

00234 

600240 


JMP .+4 

00235 

340253 


Tad ONE2 

00?36 

04025? 


DAC PNTR2 

00237 

600206 


JMP lSZHI+6 

00240 

750004 


las 

00241 

500255 


And mAsK22 

0024? 

750200 


SgA ! CLA 

00243 

600204 


JMP ISZHI+4 

00244 

776526 

hoveup 

1 AW -A 

00245 

100260 


JMS M0vE2 

00246 

000200 


ISZHI 

00?47 

006440 


8 

00 P 50 

607000 


JMP ISZLOW 

00251 

000000 

CNTR2 

0 

0025? 

000000 

PNTR2 

0 

00253 

000001 

0NE2 

1 

00 25 4 

040000 

NASK12 

40000 

0025'6 

020000 

^-AsK22 

20000 

00256 

004000 

STRT 

4000 

0 0 ? 5 7 

00777? 

UPLIM2 

7777 


.EJECT 


/Set loop counter 
/sEt up to Print header 


/SEt pointer tO 4000 

/SET AC TO -1 

/STORE IN MEMORY 

/INDEX LOCATION TO 0 

/error, computer did not SKIP 

/get CIMEMORY) 

/IS IT 0? 

/no» Error 


/loop on current NUMBER? 
/YES 


/RING BELL? 
/NO 


/NO. G^T C (PNTR2) 

/Is IT 7777 
/YES 

/NO, increment FOR NEXT 
/LOCATION 


/LOOP ON This test? 

/YES 

/NO. get READY TO 
/MOyE PROGRAM 

/ORIGIN address -lowest ADDRESS -LOW 
/destination address -lowest ADDRESS -HIGH 
/GO TO PROGRAM IN UPPER MEMORY 



PAut ? 






/subrOutinp to hovf thf 

Program (occupy low memory) 

M 0 P 6 0 

000000 

M0VE2 

0 


00 P 61 

040313 


HAH TALLY2 


00 ? 6 ? 

220260 


LAC* M0VE2 


00?6 

040314 


OAC POINT 3 


00?64 

200260 


LAC M0VE2 


00?65 

340253 


tad 0NE2 


00?66 

040260 


OAC M0VE2 


00P67 

220260 


lac* M0VE2 


00P70 

040315 


OAC P0INT4 


00?7l. 

220314 

L00P2 

LAC* P0iNT3 


00?7? 

060315 


OAC* P0INT4 


00P73 

200314 


LAC POINT 3 


00?74 

340253 


Tad ONE2 


00P75 

040314 


OAC POINT 3 


00P76 

200315 


LAC POINT 4 


00277 

340253 


TAO ONE 2 


00300 

040315 


DAC POINT 4 


00301 

200313 


LAC TALLY2 


00302 

340253 


Tad ONF2 


00303 

040313 


DAC TALLY2 


00304 

740200 


S?A 


00305 

600271 


JMP LOOP 2 


00306 

200260 


LAC MOVE? 


00307 

340253 


TAD ONE? 


0 0 310 

040260 


DAC MOVE? 


00311 

754000 


CLA :CLL 


00312 

620260 


JMP* M0VE2 


00313 

000000 

TALLY2 

0 


00314 

000000 

P0INT3 

0 


00315 

000000 

POINT4 

/ 

/routine 

0 




TO RING bell - 

LOW memory 

0 0 316 

000000 

BELL2 

0 


00317 

760207 


LAW 207 


00320 

100531 


JMS TyRE2 


00321 

400200 


XCT ISZHI 


00322 

040251 


DAC CNTR? 


003 23 

620316 

/ 

/routine 

JMP* 8FLL2 




TO ISSUE CR-LF 

LOW memory 

0 0 3 2 4 

000000 

CRLE2 

0 


00325 

760215 


LAW 215 


00326 

100531 


JMS TYPE2 


00327 

760212 


LAW 212 


00330 

100531 


JMS TYPE2 


00331 

620324 


JMP* CRLP2 





.EJECT 
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I S?-1 5 

/TYPr OUT The COmTFNTS or the AC IN octal (LOW) 


0033 ^ 

'^00 00 0 

TYPOLO 

0 

M 0 3 3 

040355 


OAC TE’^P2 

0033^^ 

777772 


LAW -6 

0 0 3 3 U 

040313 


OAC Tally? 

0 0 3 3 6 

200355 


LAC temp? 

00337 

740010 


RAL 

00340 

740010 


ral 

00341 

74?010 


RTL 

00340 

040355 


OAC TE'^P? 

0 0 3 4 3 

500356 


anO ?;E\/En2 

00344 

240357 


xOr AsKII? 

0034H 

100531 


JMS TYPE? 

00346 

200313 


LAC Tally? 

00347 

340253 


TAO ONE? 

00350 

040313 


OAC tally? 

00351 

741200 


SNA 

0035? 

620332 


JMP* TYPOLO 

00353 

200355 


LAC TEMP? 

00354 

600340 


JMP ,-14 

00355 

000000 

TEMP? 

0 

00356 

000007 

SEVEN? 

7 

00357 

000260 

ASK f I 2 
/ 

260 



/ 

/error 

/ 

HESS 12 

messages (LOW MEMORY) 

00360 

000361 

. +1 

00361 

311323 


311323 /US 

0036? 

332240 


332240 /Z.SP 

00363 

304311 


304311 /D,I 

00364 

304240 


,^04240 /DjSP 

00365 

3I63I 7 


3 I 63 I 7 /N,0 

00366 

324240 


324240 /T,SP 

00367 

323313 


323313 /S»K 

00370 

311320 


311320 /Up 

00371 

254240 


254240 /»,SP 

00372 

314317 


314317 /L»0 

00373 

303240 


303240 /C.-SP 

00374 

377000 


377000 /RQ 




.EJECT 
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IS?-15 


R 03 7'^ 

■0&*3 76 

MESS22 

. +1 



00376 

215212 


215212 

/cR*lf 


00377 

311323 


311323 

/ 1 . S 


0 0 4 0 0 

332240 


332240 

/2.SP 


00401 

301304 


301304 

/A.O 


0040? 

304215 


304215 

/O.Cr 


00403 

?1?212 


212212 

/LF.LF 


00404 

316325 


316325 

/N,U 


0 0 4 0 5 

315302 


315302 

/m.b 


00406 

305322 


305322 

/E,R 


00407 

240301 


240301 

/SP* A 


00410 

324240 


324240 

/T,SP 


00411 

317322 


317322 

/0,R 


0041? 

311307 


311307 

/I ,G 


00413 

311316 


311316 

/I ,N 


00414 

301314 


301 3l4 

/A , L 


00415 

240240 


240240 

/SP.SP 


00416 

302301 


302301 

/8, A 


00417 

304240 


304240 

/0»SP 


00420 

377000 


377000 

/rO» 




/error 

Reporting subroutine 

2 (LOW MEMORY) 

00421 

000000 

ERROR2 

0 



00422 

750004 


LAS 



00423 

742010 


rtl 



00424 

741100 


SPA 


/bell on Error? 

00425 

100316 


JMS BELL2 



00426 

750004 


LAS 



00427 

740010 


RAL 



00430 

741100 


SPA 


/print errors? 

00431 

600440 


JMP .+7 


/NO 

00432 

100324 


JMS CRLF2 


/YES, CRLF 

00433 

200360 


lac MESS12 



00434 

100510 


JMS tMESS2 


/type Out "isz did not skip. 

00435 

200252 


LAC PNTR? 



00436 

100332 


JMS TYPOLO 


/TYPE out number OF LOCATION 

00437 

100324 


JMS CRLr2 


/CR-LF 

00440 

750004 


LAS 



00441 

741100 


SPA 


/halt on error? 

00442 

740040 


XX 


/YES 

00443 

620421 


JMP« ERR0R2 

/EXIT 
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1 O ~ 

1 T 

/error 

message Reporting 

subroutine 

4 (LOW MEMORY) 


000000 

ERR0R4 

0 



0 0 4 4 ^, 

750004 


LAS 



00446 

742010 


RTL 



00447 

741 100 


SPA 

/BELL 

ON ERROR? 

00450 

100316 


JMS PELL? 

/YES 


004 51 

750004 


LAS 



0045? 

740010 


PAL 



00453 

741100 


SPA 

/print 

ERRORS? 

00454 

600502 


JMP .+26 

/NO 


00455 

200375 


LAC MESS22 



00456 

100510 


JMS TMFSS? 

/TYPE 

OUT header 

00457 

100324 


JmS CRij2 



00460 

200506 


LAC CONST? 



00461 

040455 


OAC .-4 



0046? 

200252 


LAC pNTR2 


OUT location of number 

00463 

100332 


JMS TYPOLO 

/TYPE 

00464 

760240 


LAW 240 



00465 

100531 


JMS type? 

/TYPE 

5 SPACES 

00466 

100531 


JMS TYPE? 



00467 

100531 


JMS TYPE? 



00470 

100531 


JMS TYPE2 



00471 

100531 


JMS TYPE2 



00472 

750001 


CLA JCMA 



00473 

100332 


JMS TYPOLO 

/TYPE 

ORIGINAL number 

00474 

760240 


LAW 240 



00475 

100531 


JMS TYPE2 



00476 

100531 


JMS TYPE? 



00477 

220252 


LAC* PNTR2 



00500 

100332 


JMS TYPOLO 

/type 

BAD result 

00501 

100324 


JMS CRLF? 

/CR-LF 


00502 

750004 


las 



00503 

741100 


SpA 

/HALT 

ON Error? 

0 05 04 

740040 


XX 

/yes 


00505 

620444 


JMP* ERR0R4 

/EXjT 


00506 

600462 

C0N3T2 

JMP Err0r4+16 



00507 

200375 

C0NST3 

LAC MESS22 






.EJECT 
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IS^-1 ^5 




/MFSPAGE 

TyPPOUT subroutine (LOW) 

w 0 s 1 1' 

000000 

IMF SS 2 

0 

«0511 

040314 


OAC POINT 3 

0 0 51? 

220314 


LAG* POINT 3 

00513 

740020 


RAP 

00514 

742020 


RTP 

00515 

742020 


RTR 

00516 

742020 


RTR 

00517 

742020 


RTR 

00520 

1 00531 


JHS TYPe2 

00521 

540537 


SAG RUPOT2 

00522 

62051 0 


JMp* TNESS? 

00523 

220314 


LAC* P0INT3 

00524 

1 00531 


JMS TYPE? 

00525 

440314 


IS2 POINf3 

00526 

540537 


SAD RUPOT? 

00527 

620510 


JMP* TMESS2 

00530 

600512 


JMP TMrSS2+2 

00531 

000000 

TYPE? 

0 

0053? 

500537 


and RUROT 2 

005 33 

700406 


TLS 

00534 

700401 


TSE 

00535 

600534 


JMP .-1 

00536 

620531 


JMP* TYPE2 

00537 

000377 

RUBOT? 

377 

.EJECT 
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/ROUTINE 

,LOC 7000 

TO IS? lower 2k 


/ 60 000 

IS?LOw 

LAW 

0 7OU1 

:M704 5 


OAC CNTRl 

0700? 

007533 


LAC CGNST5 

0 7 0 0 3 

247501 


OAC ERR0R3+11 

0 7 0 0 4 

147046 


DgM PNTRl 

0 7 0 05 

754001 


CLA ;CLL jCMA 

0700/ 

067046 


OAC* PNTRl 

07007 

467046 


IS2» PNTRl 

070^0 

107445 


jms errori 

07011 

227046 


Lac* pntri 

0 701? 

740200 


S24 

0 7013 

107470 


JMS ERR0P3 

07014 

750004 


LAS 

07015 

507050 


ano maskii 

07016 

740200 


S2A 

0 7 017 

607005 


JMP IS7L0W+5 

07020 

750004 


LAS 

0 7 0 21 

742010 


RTL 

0702? 

741100 


SPA 

0 7023 

607031 


JMP .+6 

07024 

207045 


lac CNTRl 

0 7025 

347047 


TAO ONEl 

07026 

047045 


DAC CNTRl 

07027 

741200 


SNA 

07030 

107276 


JMs BELLI 

07031 

207046 


LAC PNTRl 

07032 

547044 


SAO UPLIMi 

07033 

607037 


JMP .+4 

07034 

347047 


TAO ONEl 

07035 

047046 


OAC PNTRl 

07036 

607005 


JMP IS7L0W+5 

07037 

750004 


LAS 

07040 

507051 


AND MASK21 

07041 

750200 


SZA !CLA 

0704? 

607004 


JMP IS?L0W+4 

07043 

607052 


JMP RANIS? 

07044 

003777 

UPLIMi 

3777 

07045 

000000 

CNTRl 

0 

07046 

000000 

PNTRl 

0 

07047 

000001 

ONEl 

1 

07050 

040000 

HASKll 

40000 

07051 

020000 

MASK2i 

20000 


.EJECT 


MEHORY pROM mill TO 0 (OCCUPY HIGH MEmORY) 


/2ErO pointer 
/SET AC TO -1 
/STORE -1 IN MEMORY 
/index LOCATION TO 0 
/GO TO error subroutine 
/get contents oe memory 
/IS IT 0? 

/N0» Error 


/LOOP ON current number? 
/YES 

/GET C (ACS) 

/MOVE 2 LEFT 
/RING BELL? 

/NO 


/IS CNTR 0? 

/yEs, ring bell 

/NO, get C (PNTR) 

/IS IT 7777 
/YES 

/NO, increment for next location 


/LOOP ON This test 

/YES 

/NO 



PAGE B 


IS7-1 s 




/Random 

IS? Test (occupies 

HIGH MEMORY) 

0 7 0 S 

760000 

PANISZ 

L. A 


0 7 0 5 7 

4 7 0 4 5 


DAG CNTRi 

/SET UP TO COUNT LOOPS 

0705^1 

707533 


LAG GONST 5 


07055 

047545 


DAG ERROR 5 +II 


0 7 0 56 

10731? 


JMS GETi 

/GET location OF ISZ 

07057 

047112 


OAC SAVEl 


07060 

107323 


JMS get? 

/GET location TO BE IS?»D 

07061 

047113 


PAG SAVE2 


0706? 

1 07334 


JMS CO'^PaR 

/COMPARE RANDl and RANO? 

07067 

607060 


JMP 

/TO RE SURE they aRE DIFFERENT 

0 7 0 6 4 

i 07224 


JMS GEN3 

/GET NUMreR TO be lS2’n 

07065 

f^.47117 


DAC RAND3 


07066 

047114 


DAC SAVE3 


07067 

107123 

PROCED 

JMS IS?TST 

/PERFORM aND check ThE ISZ 

07070 

107534 


jmS ERROR 5 

/error, return To this instruction 

0707^ 

750004 


LAS 

/NO error, return here 

0707? 

507050 


ANn MASKll 


07073 

740200 


S2A 

/LOOP ON current numbers 

07074 

607067 


JMP PrOCED 

/YEs 

07075 

750004 


LAS 


07076 

742010 


RTL 


07077 

741100 


SPA 

/rInG bell? 

07100 

607111 


JMP .+11 

/NO 

07101 

?07045 


LAC CNTRi 

/YES 

0710? 

347047 


TAD ONEl 


07103 

047045 


OAC CNTRi 


07104 

740200 


SZA 


07105 

607111 


JMP .+4 


07106 

107276 


JMS BELLI 


07107 

407052 


xct ranisz 


07110 

047045 


OAC CNTRi 


07111 

607056 


JMP RANISZ+4 


0711? 

000000 

SAVEl 

0 


07113 

000000 

SAVE2 

0 


07114 

000000 

SAVE3 

0 


07115 

000000 

RANDl 

0 


07116 

000000 

RAND2 

0 


07117 

000000 

RAN03 

0 


07120 

771 340 

UPLIM3 

-8 

/minus lower limit of upper program 

07121 

440000 

ISZCON 

IS? 


07122 

017777 

CONSTi 

17777 





.EJECT 
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/IS2 Test 

setup 4ND EXecU 

T I ON SUbROUT I nE 

07123 

000000 

IS7TST 

0 


071 2^1 

207117 


LAC RAN03 


07125 

067116 


OACtt RAN02 

/STORE number to BE IS2*0 

0712^ 

207121 


LAC IS7CON 

/FORM ISZ 

07127 

347116 


Tad Ramo? 

/INSTRUCTION, AND 

0 7 1 3 

■^•67ll5 


DAC* RaNDI 

/STORE IT, THEN 

07131 

427115 


XCT* HaNDI 

/execute it 

07132 

740000 


NOP 

/f I ller 

07133 

207117 


LAC RAN03 

/synthesize the 

0 713 4 

347047 


Tad ONCi 

/ISZ ANO CHECK 

07135 

'^62116 


Sad* Rand2 

/TO SEF that the 

07136 

74 I 000 


SKP 

/answers agree 

07137 

627123 


JMP* ISZTST 

/they DON'T, EXIT 

07l40 

207123 


LAC ISZTST 

/increment ISZTST 

07 I 4 I 

347047 


Tad ONE! 

/THE hard Way 

07142 

047123 


oac ISZTST 


07143 

627123 


JMP* ISZTST 




''SUBROUTINE TO MOVe The 

ROGRaM (Occ'JP'f' high MEMORY) 

07144 

000000 

MOVEi 

0 


07145 

047177 


DAC TALLY! 


07146 

227144 


LAC* MOVEl 


07147 

047200 


OAC POINT! 


07150 

207144 


LAC MOVE! 


07151 

347047 


TAO ONEI 


07152 

047144 


OAC MOvEl 


07153 

227144 


LAC* MOVEl 


07154 

047201 


OAC POINT? 


07155 

227200 

LOOPi 

LAC* POINTl 


07156 

067201 


OAC* POINT? 


07157 

207200 


LAC POINTl 


07160 

347047 


TAO ONFl 


07161 

047200 


OAC POINTl 


07162 

207201 


LAC POINT? 


07163 

347047 


TAO ONFl 


07164 

047201 


DAC POINT? 


07165 

207177 


LAC TALLYI 


07166 

347047 


TAO ONFl 


07167 

047177 


OAC TALLYi 


07170 

740200 


S Z A 


07171 

607155 


JMP LOOPl 


0717? 

207144 


LAC MOVEl 


07173 

347047 


TAO ONFl 


07174 

047144 


DAC MOVEl 


07175 

754000 


CLA :CLL 


07l76 

627144 

/ 

TALLYi 

JMP* MOVFl 


07177 

000000 

0 


07200 

000000 

POINTl 

0 


07201 

000000 

P0INT2 

0 





.EJECT 




PAGE 


!S?-1 5 




/Random 

number generators high memory 

0 7?^? 

W 0 0 0 0 0 

GENi 

0 

0721^37 

P0721 1 


LAC Rl 

07204 

744010 


RAL ; CLL 

07205 

741 400 


SZL 

07206 

347212 


TAD Rl+i 

07207 

047211 


DAC Rl 

07210 

627202 


jMp» ge:ni 

07211 

000037 

Rl 

000037 

07212 

000003 


3 

07213 

000000 

6eN2 

0 

07?!'’ 

207222 


LAC R2 

07215 

744010 


RAL !CLL 

07216 

741400 


SZL 

07217 

347223 


TAD R2+1 

07220 

047222 


DAC R2 

07221 

627213 


jMp* GEN2 

07222 

000001 

R2 

000001 

07223 

000003 


3 

07224 

000000 

GeN3 

0 

07225 

207252 


lac R3 

07226 

744010 


RAL ;CLL 

07227 

741400 


SZL 

07230 

347253 


TAD R3+1 

07231 

047252 


DAC R3 

07232 

047254 


DAC R3+2 

07233 

567255 


SAD* R3+3 

07234 

741000 


SKP 

07235 

627224 


JMP* GEN3 

07236 

207255 


LAC R3+3 

07237 

347047 


tad ONEl 

07240 

047255 


DAC R3+3 

07241 

227255 


LAC* R3+3 

07242 

047252 


DAC R3 

07243 

741200 


SNA 

07244 

607247 


JMP ,+3 

07245 

207254 


LAC R3+2 

07246 

627224 


JMP* GEn3 

07247 

207710 


LAC ADDRS 

07250 

047255 


DAC R3+3 

07251 

607245 


JMP .-4 
.EJECT 



P A [, L 5 t I > " 

1, 5 



T 7 9 5 2 

900000 

R3 

0 0 0 0 0 0 

P7?5 5 

000003 


3 

7 7 ? 5 *3 

000000 


0 


007256 


P3 + 4 

? 7 ? 5 6 

0 00 0 0 0 


000000 

0 7 ? 7 7 

777775 


777775 

0 7 9 60 

0 56 4 2 7 


056427 

07261 

000175 


000175 

0 7^6^ 

000171 


000171 

0726.^ 

000137 


000137 

07264 

0 000 65 


000065 

0 7 26 

000037 


000037 

0 7 2 5 6 

0 00 031 


000031 

07267 

000023 


000023 

0 7 2 7 0 

000021 


000021 

07271 

000015 


00001 5 

07272 

000013 


000013 

07270 

000005 


000005 

07274 

000001 


000001 

07275 

000000 


000000 



/ROUT ini: 

TO Ring bell high memory 

0 7 2 7 6 

000000 

BELLI 

0 

07277 

760207 


LAW 207 

07300 

107702 


JMS TYPEl 

0 7 301 

407000 


XCT rS?LOW 

07302 

047045 


OAC CNtrI 

07303 

627276 

/ 

JMP* BELLI 



/ 

/ROUT ! NE 
/ 

CRLFi 

TO ISSUE CR-LF HIGH MEMORY 

07304 

000000 

0 

07305 

760215 


LAW 215 

07306 

107702 


JMS TYPEl 

07307 

760212 


LAW 212 

07310 

107702 


JMS TyPEl 

07311 

627304 


JMP* CRLFl 




.EJECT 



PAGE 1 ? 




/GET random number SUBROUTINES 


0731? 

>100000 

GETl 

0 


0 7 313 

1 07202 


JMS GENi 

/GET Random 

07314 

507122 


AND CONSTl 

/MASK 

07315 

047115 


DAC RANDl 

/STORE 

07316 

347120 


Tag UPLIM3 

/COMPARE TO SEE 

07317 

740100 


S M A 

/IE IT Is IN the PrOGrAM 

07320 

607313 


JMP .-S 

/IT IS, generate another 

07321 

207115 


LAC RANDl 

/NO, IT ISN’T, EXIT 

0732? 

627312 


JMP* GETi 

/WITH number in AC 

0 7 3 23 

000000 

GET2 

0 


07324 

107213 


JMS GEM2 


07325 

507122 


AND CONSTl 


07326 

047116 


DAC RAND? 


07327 

347120 


TAD UPLIM3 


07330 

740100 


SMA 


07331 

607324 


JMP .-5 


0733? 

207116 


LAC RAmD2 


07333 

627323 


JMP« GET? 




/compare 

Randi and Rand2 

subroutine 

07334 

000000 

COMPaR 

0 


07335 

207115 


lac RAMDl 


07336 

740001 


CMA 


07337 

347047 


TAD ONEl 


07340 

347116 


Tad rand? 


07341 

741200 


SNA 


07342 

627334 


JMP* COMPAR 


07343 

207334 


LAC COMPAR 


0 7 34 4 

347047 


TAD ONEl 


07345 

047334 


DAC CoMrAR 


07346 

627334 


JMP* COMPaR 



.EJECT 



PAGE 


1 " 

■ 1 5 

/TYpr OUT 

tht contents or the ac in ocTal (high) 

07347 

1-^00000 

^YPOHI 

0 

0 7 35 

747372 


OAC TEMPI 

07351 

777772 


LAW -6 

07352 

747177 


OAC TALLYi 

07353 

20737? 


LAC TEMPI 

0 7 354 

744010 


PAL !CLL 

07355 

740010 


RAL 

07356 

7 4 ? 0 1 0 


RTL 

07357 

047372 


OAC TEMpi 

0 7 360 

507373 


AND SEVENl 

07361 

247374 


XOR ASKIIi 

0736? 

107702 


JMS TYPEl 

07363 

207177 


LAC TALLYi 

07364 

747047 


Tad ONEl 

07365 

047177 


DAC TALLYi 

07366 

741200 


SNA 

07367 

627347 


JMP« TYPOHI 

07370 

207372 


LAC TEMPI 

07371 

607355 


JMP .-14 

0737? 

000000 

TEMPI 

0 

07373 

000007 

SEVENi 

7 

07374 

000260 

ASK ill 

260 


.EJECT 
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/error 

messages 

(HIGH MEMORY) 

?'7 3 75 

307376 

RESSll 

. +1 


7 3 7 6 

3n 323 


311323 

/I ,S 

PI7377 

332240 


332240 

/2.SP 

0740t^ 

304311 


304311 

/O, I 

(^741^1 

304240 


304240 

/O.SP 

0740? 

3l63l7 


316317 

/N,0 

07403 

324240 


324240 

/T,SP 

07404 

32331 3 


323313 

/S.K 

07405 

311320 


311320 

/I ,P 

0 7 4 0 5 

254240 


254240 

/. »SP 

07407 

314317 


314317 

/L,0 

07410 

303240 


303240 

/C.SP 

07411 

377000 


377000 

/RO 

0741? 

007413 

MESS21 

. +1 


0 7 413 

215212 


215212 

/CR,LF 

07414 

311323 


311323 

/I,S 

07415 

332240 


332240 

/2»SP 

07416 

301 304 


301304 

/A.O 

07417 

304215 


304215 

/O.CR 

07420 

212212 


212212 

/LF.LF 

07421 

316325 


316325 

/N.U 

07422 

315302 


315302 

/M,8 

07423 

305322 


305322 

/E*R 

07424 

240301 


240301 

/SP» A 

07425 

324240 


324240 

/T.SP 

07426 

317322 


317322 

/O.R 

07427 

311307 


311307 

/I,G 

07430 

311316 


311316 

/I»N 

07431 

301314 


301314 

/A.L 

07432 

240240 


240240 

/SP SP 

07433 

302301 


302301 

/8, A 

07434 

304240 


304240 

/O.SP 

07435 

377000 


377000 

/ro 

07436 

007437 

MESS31 



07437 

240240 


240240 

/SP SP 

07440 

311323 


311323 

/I »S 

07441 

332240 


332240 

/Z»SP 

07442 

301324 


301324 

/A , T 

07443 

215212 


215212 

/cr,lf 

07444 

377000 


377000 

/RO 


.EJECT 





/error 

Reporting subroutine t <higm memory) 

0 7 4 4 5 

.'^0000 

FRRORl 

0 



07446 

750004 


LAS 



07447 

74?010 


RTI 



07450 

741100 


SPA 


/BELL ON error? 

07451 

1 07?76 


JMS 

PELLI 

/YES 

0745? 

750004 


LAS 



07453 

740010 


RAL 



07454 

741100 


SPA 


/print errors 

07455 

607464 


JMP 

. ♦7 

/NO 

0 7 4 56 

107304 


JMS 

CRLFi 

/YES. CR-LF 

07457 

?07375 


L A C 

MESSii 


07460 

107657 


JMS 

TmeSSi 

/TYPE OUT "ISZ DID NOT SKIP, 

07461 

?07046 


LAC 

PNTRl 


0746? 

107347 


JMS 

TYPOHl 

/TYPE OUT number OF LOCATION 

0 7 4 6 3 

1 07304 


JMS 

CRLFl 

/CR-LF 

07464 

750004 


LAS 



07465 

741100 


SPA 


/halt on error 

0 74 66 

740040 


XX 


/YES 

07467 

627445 


JMP« 

• ERROR! 

/EXIT 



/ 

/error 

message 

: reporting 

subroutine ? (HIGH MEMORY) 

07 4 70 

000000 

ERRORS 

0 



07471 

750004 


LAS 



0747 ? 

742010 


RTL 



07473 

741100 


SPA 


/BELL ON error 

07474 

107276 


JMS 

Belli 

/yes 

07475 

750004 


LAS 



07476 

740010 


RAL 



07477 

741100 


SPA 


/PRINT ERRORS? 

07500 

607526 


JMP 

. +26 

/NO 

07501 

207412 


LAC 

MESS21 


0750? 

107657 


JMS 

TMrSSi 

/TYPE OUT header 

07503 

107304 


JMS 

CRLFl 


07504 

207532 


LAC 

CONST 4 


07505 

047501 


OAC 

. -4 


07506 

207046 


LAC 

P^fTRl 


07507 

107347 


JMS 

TYPOHl 

/type out location or number 

07510 

760240 


LAW 

240 


07511 

107702 


JMS 

TYPEl 

../5 spaces 

0751? 

107702 


JMS 

typei 


07513 

107702 


JMS 

TYPEl 


07514 

107702 


' JMS 

typei 


07515 

107702 


JMS 

TYPEl 



.EJECT 


LOC" 



PAGE 16 


IS?-15 


07^16 

7 5 0 !?■) 0 1 


CL A : CMA 


07517 

107347 


JMS TYPQhI 

/TYPp OUT original NUmReR 

07520 

760240 


LAW 24 H 


07521 

107702 


JMS typei 


07522 

1 07702 


JMS TYP^l 


«7523 

227046 


LAC« PigTRl 


07524 

107347 


JMS TYpOHI 

/TYpE BAD result 

07525 

1 07304 


JMS CRLFi 

/CR-LF 

07526 

750004 


LAS 


07527 

741100 


SPA 

/halt on ERROR? 

07530 

740040 


XX 

/YES 

07531 

627470 


jMP* errors 

/EXIT 

07532 

607506 

CONST 4 

JMP ERROR 3 +I 6 


07533 

207412 

C0NST5 

LAC MESS21 

r Ir-r* T 



.EJECT 



P A tWi 7 


! S 7 — 1 ^5 




/rPRTH RpPnRTiNjG SUbROUT f 

Nt 5 (HIGH 

MEMO R Y ) 

7 '^ 7 )^ 

;-1 P /? t-' 0 

rRR0=;'5 




7 5 3 S 

7 5 0 kI 4 

LAS 




7 5 S ^ 

M 2 0 1 0 

R T L 




7 7 S ,5 7 

741100 

SPA 


/bell 

ON ERROR 

f» 7 5 4 / 

1 07276 

JMS 

pelli 

/YES 


f* 7 R 4 1 

7 5 M VI 0 4 

LAS 




0 7 R 4 7 

740010 

RAL 




0 7'54 3 

741100 

SPA 


/PR I nT 

ERRORS? 

07^44 

<^07577 

JMP 

. + 33 

/NO 


0754S 

207412 

LAP 

MESS?1 



0 7 5 4 1 ^. 

1 07657 

J M S 

T HF SSl 

/TYPE 

H fj A 0 E R 

0754 7 

707436 

L AC 

MESS31 



07550 

107657 

JMS 

TmfSSi 

/TYPE 

’‘ISE at*' 

0 7551 

207651 

LAC 

C0NST6 



0755? 

047545 

OAC 

. -5 



07557 

207116 

LAC 

R A N 0 2 



07554 

107347 

JMS 

TYPOHI 

/TYPE 

location of number 

07555 

760240 

LAW 

240 



07556 

107702 

JMS 

T YPEl 

/5 SPACES 

07557 

107702 

JMS 

TYPEi 



07560 

107702 

JMS 

TYPEl 



07561 

107702 

JMS 

TYPEI 



07562 

107702 

JMS 

TYPEl 



07563 

207117 

LAC 

RAND 3 



07564 

107347 

JMS 

TYoqhI 

/TYPE 

original number 

0 7565 

760240 

LAW 

2 40 



07566 

107702 

JMS 

TYPEI 



07567 

107702 

J M S 

TYPEi 



07570 

227116 

L AC» 

RANn2 



0757I 

I07347 

JMS 

typohi 

/type 

BAD number 

07572 

760240 

L AW 

24 3 



07573 

107702 

JMS 

TYPEi 



07574 

207115 

LAC 

PANQl 



07575 

107347 

jMS 

typohi 

/type 

LOCATION Of ISZ 

07576 

107304 

JMS 

crlfi 



07577 

750004 

LAS 




07600 

741100 

SPA 


/HALT 

ON ERROR? 

07601 

740040 

XX 


/YES 


07602 

750004 

■UCK LAS 




07603 

507645 

AND 

MASK31 



07604 

741 200 

SNA 


/SAVE 

error conditions? 

07605 

627534 

JMR« 

■ EPROR5 

/NO 




.EJECT 





PAGE 


IS?-1 ^ 



/VARY location OF IS?? 

/NO 

/yes, get another address 
/IS RaND1=RaND2 
/YES. TRY AqAiN 
/ALL OK, GO ON 
/TRANSFER C(SAVEl ) 

/TO RANDI 


/Vary location of operand? 

/NO 

/yes, get op address 

/IS RaND1=RaND2? 

/yEs. try Again 

/ALL OK, GO ON 
/TRANSFER C(SaVE2) 

/TO Rand? 


/VARY operand? 

/NO 

/YES 


/PERFORM and check THE IS2 
/ERROR returns HERE 

/NO error returns here 



PAGE IP 






/ROUT I NE 

TP MOVE program to 

lower memory ANO 

STaRT |S£^HI 

0765? 

7 7 6 5 ? 6 

MOVEON 

L A - A 

/GET ready TO 


0 7 6 5?; 

107144 


JMS MjVEl 

/MOVE A WORDS 


07654 

? 06 4 4 0 


P 

/FROM high TO 


07656 

000200 


I S ? H I 

/LOW MEMORY 


07656 

600?00 


JMP IS^MI 

/then transfer 

control to iszhi 



/message 

TYprouT SUbPOUTINE 

<HIGH) 


07657 

000000 

TMESSi 

0 



07660 

047200 


PAC PQINTl 



07661 

227200 


LAC« POIMTl 



0 76 6? 

740020 


R A w 



07663 

742020 


R T R 



07664 

747020 


RTR 



07665 

742020 


RTR 



0 766 6 

74?0?0 


PTR 



07667 

107702 


JMS TYPEl 



TiltlVf 

547711 


SAP rUROTI 



07671 

627657 


JMP* TMESSi 



0767? 

?27200 


LAC» POINTl 



07673 

107702 


JMS TYPEl 



07674 

547711 


SAP RUPOTl 



07675 

627657 


JMP* TMESSi 



07676 

207200 


LAC POINTl 



07677 

347047 


TaO ONEl 



07700 

047200 


OAC POINTl 



07701 

607661 


JMF TMrSSi+2 



0770? 

000000 

TYPEl 

0 



07703 

507711 


and RUBOTl 



07704 

700406 


TLS 



07705 

700401 


TSP 



07706 

607705 


JMP .-1 



^n<A7 

62770? 


JMP* TYPEl 



07710 

007256 

AOORS 

P 3 + 4 



07711 

000377 

PUBOTi 

377 




00125? 

asRUrOT2 

-ISZhI+i+RUBOTi-ISZLOW+i 



006440 

Hs I SZLOW 

-RUBOT?*ISZHl-l 




000000 


.EMO 






NO error LINES 





PAGE 2^ 
4 

AOORS 
ASKI II 
A S K I 1? 

R 

PACK 

RELLl 

rELL2 

clof 

clon 

CLSF 

CNTRl 

CNTR2 

COMPAR 

comsti 

C0NST2 

C0NST3 

consta 

C0NST5 

C0NST6 

CR-lFI 

CRLF2 

ERRORl 

FRR0R2 

FRROR3 

ERR0R4 

ERRORS 

GENl 

GEN2 

GEN3 

GETl 

GET2 

IS2CON 

IS2HI 

IS2LOC 

IS2LOW 

IS2TST 

KRP 

KSF 

LOOPl 

L00P2 

MASKll 

MASK12 

MASK21 

MASK22 

MASK31 

MASK41 

MASK51 

MASK61 

MESSll 

MESS12 

MESS21 

MESS22 

MESS31 

MOV EON 


1^01252 

07710 

07374 
003S7 

006440 
07602 
07276 
0031 6 
700004 
700044 
700001 
07045 
00251 
07334 

07122 

00506 

00507 

07532 

07533 

07651 
07304 
00324 
07445 
00421 
07470 
00444 

07534 
07202 
07213 
07224 
07312 
07323 
07121 
00200 
07606 
07000 

07123 
700312 
700301 

07155 

00271 

07050 

00254 

07051 

00255 

07645 

07646 

07647 
07650 

07375 
00360 
07412 
00375 
07436 

07652 



PAGE 21 

I SZ 

MOVEUP 

00244 

MOVEl 

07144 

M0VE2 

00260 

ONEl 

07047 

ONE2 

00253 

OPLOC 

07620 

OPNUM 

07632 

PCF 

700202 

PNTRl 

07046 

PNTR2 

00252 

PO INTi 

07200 

P0INT2 

07201 

PO INT3 

00314 

PO I NT4 

00315 

PROCEO 

07067 

PSA 

700204 

PS8 

700244 

PSF 

700201 

RANDl 

07115 

RAND2 

07116 

RAND3 

07117 

RANISZ 

07052 

RCF 

700102 

RRR 

700112 

RSA 

700104 

RSB 

700144 

rsf 

700101 

ruboti 

07711 

RUB0T2 

00537 

R1 

07211 

R2 

07222 

R3 

07252 

savei 

07112 

SAVE2 

07113 

SAVE3 

07114 

SEVEnI 

07373 

seven? 

00356 

strt 

00256 

TALLYI 

07177 

TAllY2 

00313 

tcf 

700402 

TEMpl 

07372 

TEMP2 

00355 

TLS 

700406 

TMESSl 

07657 

TMESS2 

00510 

TRYDIF 

07642 

TSF 

700401 

TYPEl 

07702 

TYPE? 

00531 

TYPOHI 

07347 

TYPOLO 

00332 

UPL IHl 

07044 

UPLIM2 

00257 

UPLIH3 

07120 



PAGE 22 

IS? 

IS?HI 

00200 

MOVEUP 

00244 

CMTR2 

00251 

pntr? 

00252 

ONE2 

00253 

MASK12 

00254 

MASK22 

00255 

STRT 

00256 

UPL IM2 

00257 

MOVE? 

00260 

L00P2 

00271 

TALLY2 

00313 

P0INT3 

00314 

P0INT4 

00315 

RELL2 

00316 

CRLF2 

00324 

TYPOLO 

00332 

TEMP2 

00355 

SEVEN2 

00356 

ASKI 12 

00357 

MESS12 

00360 

MESS22 

00375 

ERROR2 

00421 

ERR0R4 

00444 

CQNST2 

00506 

CONST 3 

00507 

TMESS2 

00510 

TYPE2 

00531 

RUB0T2 

00537 

A 

001252 

B 

006440 

IS2LOW 

07000 

UPLIMl 

07044 

CNTRl 

07045 

PNTRl 

07046 

ONEl 

07047 

MASKll 

07050 

MASK21 

07051 

RANISZ 

07052 

PROCED 

07067 

SAVEl 

07112 

SAVE2 

07113 

SAVE3 

07114 

RANDl 

07115 

RAND2 

07116 

RAND3 

07117 

UPLiM3 

07120 

IS2C0N 

07121 

CONSTl 

07122 

IS2TST 

07123 

MOVEl 

07144 

LOOPl 

07155 

tallyi 

07177 

POINTl 

07200 

POINT2 

07201 



page:^3 

IS 

GENl 

7il7S^7. 

R1 

7sl2\\ 

GEN2 

07213 

R2 

07222 

GENS 

07224 

R3 

07252 

BELLI 

07276 

; CRLFl 

07304 

GETl 

07312 

GET2 

07323 

COMPAR 

07334 

TYPOHI 

07347 

TEMPI 

07372 

SEVENl 

07373 

ASK I 1 1 

07374 

MESSll 

07375 

MESS21 

07412 

MESS31 

07436 

ERRORl 

07445 

ERRORS 

07470 

C0NST4 

07532 

C0NST5 

07533 

ERR0R5 

07534 

RACK 

07602 

ISFLOC 

07606 

OPLOC 

07620 

OPNUM 

07632 

TRYOIF 

07642 

MASK31 

07645 

MASK41 

07646 

MASK51 

07647 

MASK61 

07650 

C0NST6 

07651 

MOVEON 

07652 

TMESSl 

07657 

TyPEl 

07702 

ADDRS 

07710 

RUROTl 

07711 

CtSF.. 

700001 

CLOF 

700004 

CL O N 

700044 

RSF1 

700101 

RCF 

700102 

RSA 

700104 

RRB 

700112 

RSR 

700144 

PSF 

700201 

PCF 

700202 

PSA 

700204 

PSB 

700244 

KSF 

700301 

KRR 

700312 

TSF 

700401 

TCF 

700402 

TLS 

700406 



MAINDEC EVALUATION REQUEST 


After sufficient familiarization with the operation and documentation of this MAINDEC, 
please indicate your assessment of the following areas and return this form to Digital Equipment Cor- 
porati on . 


IDENTIFICATION ; MAINDEC NO Program Title 

USAGE ; Used by; Field Service Production | j Other 

Frequency of Usage; Daily □ Weekly | | Monthly [ | 

SUGGESTIONS FOR IMPROVEMENT 

1. Are the program loading and operating instructions; clear ? | incomplete ? | |, difficult to 

fol low ? | I 

2. Do the error reports and program documentation provide sufficient diagnostic information. 

in all cases? □ , in most cases? D - very few cases Suggestions for improvement; 



3. Is the program effective in isolating malfunctions; in all cases , in most cases? 

in very few cases Would additional Scope loops or Switch Register control be helpful ?, 

Suggestions for improvement; 



4, Does the program ever fail to detect malfunctions exposed by other software?. 
Were Margins used? Please describe malfunction in detail; 



5. Does the program ever report non-existant malfunctions? 

Please indicate erroneous report and any pertinent operating conditions: 



6. Does this MAINDEC ever expose malfunctions in the Central Processor or other peripheral units not 

detected by the appropriate MAINDEC ?_ 

Please describe malfunction and MAINDEC(S) used; 



7. Does the document pro vide a general understanding of the functional programming requirements of 
the system? Good[ |, Fair^^, NoneQH . Would a general description of programming re- 
quirements increaseme effectiveness of thisMAINDEC? 


Remarks: 







Fold Here 


Do Not Tear - Fold Here and Staple 


FIRST CLASS 
PERMIT NO. 33 
MAYNARD, MASS. 


BUSINESS REPLY MAIL 

NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES 


Postage will be paid by: 



Digital Equipment Corporation 
Diagnostic Programming Group 
146 Main Street, Building 12 
Maynard, Massachusetts 01754 




